o 

PAGE 1 OPSYSI SRC OPERATING SYSTEM INTERACTIVE MOPE 



o 



O .TITLE OPERATING SYSTEM INTERACTIVE MODE O 

/7"27^7l 
_ /DIGITAL EQUIPMENT CORPORATION; MAYNARO, MASS, 

O /ED HILTON 



O 011400 

O 

O 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 





700311 




700312 




700402 




700401 




700004 




707552 




707544 




000560 




705512 




000522 




0004 60 




000514 




000756 




000120 




800004 




000540 




000247 




736000 




735000 




724000 




730000 




722000 




721008 




707764 




707702 


01400 


202660 


01401 


741000 


01402 


601747 


01403 


042606 


01404 


222606 


01405 


741200 


01406 


600247 


31407 


200100 


01410 


740200 


01411 


600247 


01412 


703302 


01413 


707764 


01414 


707702 


01415 


736000 


01416 


735000 



/ 




,ABS 




.LOG 
/ 
KSF=700311 


1400 




KRB=700312 




TCP=700402 




TSF=700401 




CLOF5700004 




OTRA=707552 




PTXA»707544 




UPREPXS560 




RPL?705512 




TYP0NE=522 




TSIXBT=460 




CRLF=514 




SLJNK-756 




GETMON=120 




SAVAC=4 




PSOD=540 




CHAIN=247 




CLLR5736000 




CLX=735000 




PXA=7g4000 




PLA=730000 




PAL=722000 




PAX=721000 




EBA=707764 




EEM3707702 




/ 




START LAC 


<?un 


SKP 




JMP 


TYPE I 


DAC 


LTEMP 


LAG* 


LTEMP 


SNA 




JMP 


CHAIN 


LAC 


|00 


SZA 




JMP 


CHAIN 


CAF 




EBA 




EEM 




CLLR 




GLX 




.EJECT 





/CHECK FOR CHAIN MODE OPERATION 



/CLEAR THE WORLD 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 



o 
o 
o 
o 

o 
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.EJECT 



u 
o 
o 



O 01417 100514 JMS CR^F 

01420 100514 JMS yRI,F 

01421 100560 JMS UPREFX 

O 01422 2026&1 LAC (SYSEXC*! U 

01423 100460 JMS TSJXBT 

01424 100511 JMS CHL.F „ 
O 01425 202662 LAC (JMP SYSINT <~> 

01426 04006,3 DAC 3 

01427 202660 UAC (St, INK /PRESET POINTERS TO BEGINNING 

O 01430 042606 DAC LTEMP /OF SU NK , p JL j ST i AP JUST i AND U 

01431 202663 UAC (PJLJST /EXCLST TABLES 

01432 042603 DAC SRVP! 
O 01433 202664 LAC UFU5T 

01434 042604 DAC SRVAPl 

01435 162603 D2M# SRVPi" 

O "" / 

/PRESET ALU API CHANNELS WITH JMS TO ERROR TRAP 
/ 

O 01436 777740 LAW "40 

01437 042607 DAC LTEMP2 

01440 202665 LAC (40 

O 01441 042610 DAC LTEMP3 

31442 202666 LAC (JMP ER40 

01443 062610 DAC« LTEMP3 

O 01444 442610 \Si LTEMP3 

01445 342667 TAD (2 

01446 442607 I S2 LTEMP2 
O 01447 601443 JMP ( M 

/ 
/NOW CHECK FOR API WANTED AND PRESENT 

O / 



01450 750004 LAS 

01451 502670 AND (400000 
O 01452 042625 DAC APJON" 

01453 740100 SMA 

01454 601464 JMP LDJSP 
O 01455 705504 ISA 

01456 705501 SPI 

01457 601617 JMP APJNON 
O 01460 705514 ISA+10 

01461 202671 LAC * ( Ap J MSGsl*400000 

01462 100460 JMS TSJXBf 

O 01463 100514 JMS CRLF O 



O 
O 
O 
O 

o 
o 
o 
o 
o 
o 



o 
o 
o 
o 

o 



o 

o 
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u 
o 



O iEJECT 

o 
o 
o 
o 
o 
o 
o 

o 



o 
o 
o 



O /LOAD PI AND API PJSPATCH TABLES O 

/ 

01464 222606 UOISP UAC* LTEMP /LTEMP CONTAINS. (SLINK 

O 01465 042607 PAC LIEMP2 

31466 601473 JMP i+5 

01467 222606 LAC» LTEMP 

O 01470 741200 SNA 

01471 601573 JMP SYSJNzf /ENP OF SUNK TABLE, INITIALIZE UNIT TESTS, 

01472 042607 DAC LJEMP2 

O ' / ' ' ' 

01473 222607 LAC* LTEMP2 /GET UODSW FOR TEST 

01474 042610 DAC LTEMP3 ^ 
O 01475 502665 AND (40 ~ U 

01476 74020(3 SHA /TEST FQR NOP BIT IN UODSW 

01477 601504 JMP XLDISH /DON'T EXECUTE THJS TEST 
O 01500 202610 LAC LTEMP3 

01501 741100 SPA /IS TEST A GP TEST? 

01502 601506 JMP IQDISP /J/Q TEST 
O 31503 601566 .JMP PIPISP 

/ 

01504 442606 XLDISP ISZ LTEMP /POINT AT ADORESS OF NEXT UODSW 

O 01505 601467 JMP LDISP*3 

/ 

/ I/O TEST, LOAD P,I» OT A.P,I, DISPATCH TABLE ^ 

o / ° 

01506 ?02625 JQDISP LAC AP]0N 

01507 740100 " SMA /SKIP IF API PRESENT AND WANTED 

O 01510 601566 MP PIDISP /NOT WANTED O 

/ 

01511 202610 LAC LTEMP3 /GET UODSW ANO SEE IF DEylQE USES API 

O 01512 74 4010 RCL 

31513 740100 SMA 

01514 601566 JMP PJDISP /DOESN'T USE API 



o 
o 
o 



o 
o 
o 
o 
o 
o 
o 
o 
o 

o 





page: 4 


OPSYST 


SRC OPERATING SYSTEM INTERACTIVE MOPE 


o 






/STORE 


UEEA IN 
/ 
LAC 


AP{ DISPATCH 


TABLE 




01515 


202607 




UTEMPZ 


/GET ADDRESS OF UOQSW 


o 


01516 


342672 




TAD 


(4) 






01517 


042623 




DAC 


TEMP i 7 






01520 


222623 




lac» 


TEMP,/ 




o 


01521 


062604 




DAC» 


SRVAPJ 






01522 


202610 




LAC 


UTEMP3 


/GET THE API CHANNEU FROM UQDSW 




01523 


502673 




AND 


ii7 




o 


91524 


34266? 




TAD 


(40 






31525 


04261k! 




DAC 


UTEMP3. 


/STORE ABSOLUTE API CHANNEL ADDRESS 




01526 


202627 




UAC 


APfGO 


/APIGO s JMS* 


o 


31527 


3426»4 




TAD 


SRVAPI 


/ADD ADDRESS OF API DISPATCH TABUE ENTRY 




01530 


062610 




DAC« 


UTEMP3 


/PUT JMS* TABUE ENTRY JN APJ TRAP ADDRESS 




01531 


442604 




JS2-' 


SRVAPI 




o 


01532 


222607 




LAC* 


UTEMP2 






01533 


042610 




DAC 


UTEMP3 


/GET UQDSW ANP EXAMJNE JT FOR MULTIPLE AP 




01534 


502674 




AND 


(4000" 




o 


01535 


741200 




SNA 








01536 


601565 




JMP 


1 1 1 


/ONUY ONE TRAP ADDRESS 




01537 


202675 




UAC 


<W 




o 


01540 


042655 




DAC 


APIPTR# 






01541 


202607 


10,2 


UAC 


UTEMP2' 






01542 


342655 




TAD 


APIPTR 




o 


01543 


042610 




DAC 


LTEMP3 






01544 


222610 




UAC* 


UTEMP3 






01545 


502673 




AND 


(37 




o 


01546 


741200 




SNA 








01547 


601565 




JMP 


iPil 






01550 


342665 




TAD 


(40 




o 


01551 


042610 




DAC 


UTEMP3 






01552 


202627 




UAC 


APIGO 






01553 


342604 




TAD 


SRVAPI 




o 


01554 


062610 




DAC* 


UTEMP3 






01555 


222623 




UAC» 


TEMP, 7 






01556 


062604 




DAC* 


SRVAPI 




o 


01557 


442604 




ISZ 


SRVAPI 






01560 


442655 




ISZ 


APIPTR 






01561 


202655 




UAC 


APIPTR 




o 


0.1562 


542672 




SAD 


<2> 






01563 


601565 




JMP 


10,1 






01564 


601541 




JMP 


10,2 


/ONLY FOUR ALLOWED 


o 


01565 


601504 


10,1 


JMP 
/ 

UEEA IN 


XL,0J5P 










/STORE 


P,I, PJSPATCh 


TABLE 


o 








/ 








01566 


202607 


PIOISp 


UAC 


UTEMP2 


/GET SERVICE ADDRESS 




01567 


062603 




DAC* 


SRVPI ' 


/PUT HIM IN SRVPI LIST 


o 


01570 


442603 




IS2 


SRVPI 






01571 


162603 




DZM» 


SRVPI 






01572 


601504 




JMP 


XUDISP 




o 








, EJECT 






o 














o 















ADDRESSES 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 



o 
o 
o 
o 
o 

o 
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O /INITIALIZE UNIT TESTS 

/ 



u 
o 
o 
o 
o 



1 5 <^ 2B266&) SYSIN2 LAC (SUNK /GET ADDRESS OF SLINK TABLE 

O 01574 042606 DAC LTEMP 

01575 142646 DZM fEXlT /CLEAR SOFTWARE TTY TJMER FLAG 

^ 01576 222606 NXHNH LAC* LTEMP /GET ADDRESS OF UQQSW 

O 91577 741200 SNA 

01600 601626 gMP DOJOB /INITIALIZATION OF JOBS COMPLETE 

01601 042607 DAC LTEMP2 
U 01602 222607 LAC» LTEMP2 /UOPSW O 

01603 502665 AND (40 /TEST FQR NQP BJT 

01604 740200 SZA 

O 01605 601615 jmP NXTZ.l /DON'T INITIALISE THIS TEST, O 

01606 202676 LAC (S 

01607 342607 TAD LTEMP2 

O 01610 042607 DAC LTEMP2 Q 

01611 222607 LAC« LTEMP2 /GET INITIALIZATION ADDRESS ( U J EA ) 

0163,2 042610 DAC LTEMP3 

O 01613 754000 CLAJCLL " " Q 

01614 122610 jhS# LTEMP3 /DO IT! 

/ 

O 01615 442606 NXTZ,1 IS? LTEMP /RETURN HERE AND INITIALIZE NEXT TEST O 

01616 601576 JMP NXTINZ 

O 01617 202675 APJNON LAC U) /API WANTED BUT NOT IN MACHINE Q 

01620 042650 DAC ERRNUM 

01621 142653, QJ5M EHRNUM*1 
O 01622 102036 JMS ERCALL 

01623 100514 JMS CRLF " 

01624 142625 DZM APJON 
O 01625 601464 JMP LPJSP 

/ 

^ /TEST FOR ANY ERROR REPORTING TO BE DONE, 

O / 

01626 777777 DOJQB LAW *l 

0.1627 0426i?7 DAC PJJND* /PROGRAM INTERRUPT ENTRY INDICATOR 

O 01630 102364 JMS APJPJ ' 

01631 102114 NXTJO0 JMS ERTEST 

01632 601631 JMP NXTJOB 
O .EJECT 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

PAGE 6 OPSYSf SRC OPERATING SYSTEM INTERACTIVE MODE 



o 

o 



O /PROGRAM INTERRUPT SERVICE ROUTINE O 

/ 

01633 724000 SYSINT PXA 

O 01634 0426>3 DAC INQEXR O 

01635 730000 

01636 042654 ,.._ ...... 

O 01637 707764 EBA O 

01640 707702 

01641 700314 
O 01642 0426*1 DAC ERRNUM+1 O 

31643 2026*7 LAC PI JNP /CHECK FOR SECOND ENTRY TO INTERRUPT ROUTINE 

01644 5426/7 _. _ 

O 01645 741000 SKP /OKi O 

01646 740040 HUT /SECOND ENTRY WITH INTERRUPT OFF, SAD NEWS! 

01647 1426*7 DZM PJINP 
O 01650 2026S1 LAC ERRNUM+1 O 

01651 741100 SPA /SKJP IF P,J, CONTROL IS DISABLED 

01652 740040 HI^T 
O 01653 742010 RTL /KEYBOARD? O 

01654 740010 

01655 741110 
O 01656 601662 

01657 741100 

01660 601775 JMP CHTYPE /TELEPRINTER 

O 01661 601707 



01664 700312 

O 01665 542700 

01666 601670 

01667 601675 

o 

01670 707552 

01671 502701 
O 01672 707544 

01673 700004 

01674 600120 
O 

O 

O 

O 

o 
o 

o 



SYSINT PXA 




DAC 


INPEXR 


PUA 




DAC 


U;i.MITR 


EBA 




EEM 




IORS 




DAC 


ERRNUM+1 


LAC 


PI JNP' 


SAD 


("1 


SKP 




HLT 




DZM 


PIINP 


UC 


ERRNUM+1 


SPA 




HLT 




RTL 




RAL 




SPAIRAL 




JMP 


CHKYBD 


SPA 




JMP 


CHTYPE 


JMP 


SYSJO" 


/ 




CHKYBD KSF 




Hl.,T 




/ 




KRB 




SAO 


(203 


JMP 


i+2 


JMP 


S.I.OEX 


/ 




DTRA 




AND 


(020000 


DTXA 




CLOF 




JMP 


G |TMQN 


.EJECT 





o 
o 



01662 700311 ... „ ,,.,. 

O 01663 740040 HUT /KSF D jQNt T SKIP BUT STATUS BJT HIGH O 



o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 



PAGE 7 QPSYST SRC OPERATING SYSTEM INTERACTIVE MOPE 



0171.1 222603 L,AC* SRVPJ /GET UEENA PROM P.I, DISPATCH TABLE 

O 017X2 741200 SNA 



O 01741 042624 

01742 442624 

01743 601742 
O 01744 102036 

01745 100514 

O 

o 



XSYSIO IS? 


NQFLAG 


ump 


,*4 


LAC 


(PJLIST 


DAC 


shvpi" 


JMP 


SYSI0+2 


LAC 


(2) 


DAC 


ERRNUM 


CAF 




LAC 


,s3 


DAC 


TEMP, a 


JSZ 


TEMP, 5 


JMP 


."1 


JMS 


ERCALU 


JMS 


CHt,F 



1737 703302 
01740 201735 L.AC ,*3 /SET UP DELAY BEFORE TYPING 



( ) 



o 



O /EXIT FROM PROGRAM INTERRUPT SERVICE ROUTINE O 

/ 

r . 1 6 ?5 777777 slQEX LAW «1 / S E;t SWITCH TO ALLOW ENTRY TO PI ROUTINE 

O 01676 042657 DAC PI.JN0 

01677 202654 LAC LIMITR 

01700 722000 PAL 

O 01701 2026!i3 LAC JNDEXR 

01702 721000 PAX 

01703 200004 LAC SAVAC 
O 01704 703344 D8R 

01705 7B0042 ION 

01706 620000 JMP* 
O / 

/EXECUTE PROGRAM INTERRUPT FLAG SEARCH 
^ / 

O 01707 777777 SYSIO LAW ol 

01710 042630 DAC NQFL^G 



o 
o 
o 
o 
o 
o 
o 
o 



01713 601730 JMP XSYSIO /END OF P,J, SERVICE DISPATCH TABLE 

01714 042623 DAC TEMP 1 7 
O 01715 342672 TAD (4? 

01716 042624 DA C TEMP, 3 

^ 01717 222624 LAC« TEMP, 5 

O 01720 042624 DAC TEMP, 8 

01721 222623 LAC* TEMP, 7 

01722 751101 SPAICLC 

O 01723 122624 JMS* "" TEMP,b /ENTER UN J T TESTS SKIP CHAIN O 

/ 

/RETURN WITH AC 5 „i JF NOT DEVICE FLAG 

O /IF AC = 0, THEN DEVICE WAS THE ONE THAT CAUSED INTERRUPT O 

/ - . . . . w 

01724 442603 ISZ SRVPI 
O 01725 741200 SNA 



O 

o 



01726 6016/5 JMP SIQEX /INTERRUPT SOURCE DETECTED AND SgHVjCEO, 

01/27 601711 JMP SYSJO+2 /TRY NEXT UNIT JN PI SERVICE TABLE 

O / 

/REACHED THE ENO OF THE p,I, SERVICE DISPATCH TABLE, 
/ 

O 01730 442630 XSYSIO ISZ NQFLAG /SKIP IF ANOTHER PASS JN ORDER O 

01731 601735 JMP ,*4 /NO UNIT TEST HAS IDENTIFIED INTERRUPT 

01732 202663 ' "" '""■ '"" 
O 01733 0426Pj3 DAC SHVPi" O 

01734 601711 -- ------- 

01735 202667 
O 01736 SJ52650 DAC ERRNUM /MONITOR ERROR 02 Q 

O 
O 
O 

u 



o 
o 
o 
o 
o 
o 
o 
o 



o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



PAGE B 
03,746 



OPSYST SRC 

601400 



OPERATING SYSTEM INTERACTIVE MODE 

JMP- START 
.EJECT 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 






o 
o 
o 
o 
o 
o 
o 

o 



o 












o 














PAGf. 9 


OPSYSJ 


SRC OPERATING 


SYSTEM INTERACTIVE MODE 


o 






/SOFTWARE TELEPRINTER FLAG TIMER 




01747 


700002 


TYPEI 


IOF 




o 


01750 


202646 




LAC 


TEXIT 




01751 


542702 




SAO 


<*2 




01752 


601772 




JMP 


TYPEil 


o 


01753 


7402M0 




SZA 






01754 


740040 




HLT 






01755 


777777 




LAW 


»1 


o 


01756 


042646 




OAC 


TEXIT 




01757 


700042 




ION 






01760 


201751 




LAC 


TYPEI+2 


o 


01761 


042647 




DAC 


TCNT 




01762 


202646 




LAC 


TEXIT' 




01763 


741200 




SNA 




o 


01764 


620522 




JMP» 


TYPONE 




01765 


44264/ 




isz 


TCNT 




01766 


601762 




JMP 


i "4 





01767 


700401 




TSF 






®%77® 


740040 




HLT 






01771 


620522 




JMP* 


TYRONE 


o 








/ 






01772 


142646 


TYPE.l 


DZM 


TEXIT 




01773 


700042 




ION 




o 


01774 


620522 




JMP* 

/ 
TSF 


TYRONE 




01775 


700401 


CHTYPE 







01776 


740040 




HLT 
/ 

TCF 


/T5F O.I 




01777 


700402 






o 


02000 


202646 




LAC 


TEXIT 




02001 


542677 




SAD 


IH 




02002 


602010 




JMP 


CHT,1 


o 


02003 


740200 




SZA 






02004 


740040 




HLT 






02005 


777776 




LAW 


<*8 


o 


02006 


042646 




OAC 


TEXIT 




02007 


601675 




JMP 

/ 

DZM 


SJQEX 


o 


02010 


142646 


CHTil 


TEXIT 




02011 


601675 




JMP 
.EJECT 


SI.OEX 


o 












o 












o 












o 












o 












o 













u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

NOT SKIP BUT STATUS BIT HJGH O 



o i 

o J 

o 

o 

o 

o 

o 

o 

o 

o 



o 












o 
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QpSYST 


SRC OPERATING 


SYSTEM .INTERACTIVE MODE 


o 






/API BREAK TO 


JNCqRRECT CHANNEL 




02012 


040004 


APJERR 


DAC 


SAVAC 


o 


02013 


7 00002 




JOF 






02014 


7055i4 




ISA+10 






02015 


705512 




RPL 




o 


02016 


042652 




DAC 


ERRNUM+2 




02017 


700314 




I0RS 






02020 


042653," 




DAC 


ERRNUM*! 


o 


0202a 


703302 




CAF 






02022 


202703 




LAC 


T3) 




02023 


042650 




DAC 


ERRNUM 


o 


02024 


102036 




JMS 


ERCALL 




02025 


102050 




JMS 


SPACE2 




02026 


202652 




lac 


ERRNUM*2 


o 


02027 


100540 




JMS 


PSOD 




02030 


102050 




JMS 


5PACE2 




02031 


200004 




LAC 


SAVAC' 


o 


02032 


502704" 




AND 


U7) 




02033 


100540 




JMS 


PSOD 




02034 


100514 




JMS 


y?LF 


o 


02035 


601400 




JMP 


START 








/IDENTIFY AND 


REPORT ALL MONITOR ERRORS 


o 








/ 






02036 


000000 


ERCALL 









02037 


202705 




LAC 


(TSYSER*i*400000 


o 


02040 


100460 




JMS 


TSJXBT 




02041 


202650 




LAC 


ERRNUM 




02042 


100540 




JMS 


PSOD 


o 


02043 


102050 




JMS 


SPACE2 




02044 


202651 




LAC 


ERRNUM*! 




02045 


100540 




JMS 


PSOD 


o 


02046 


142651 




DZM 


ERRNUM+1 




02047 


622036 




JMP* 


ERCALL 










.EJECT 


o 












o 












o 










- 


o 












o 












o 












o 












o 













u 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



o 

o 
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11 


QPSYST SRC 


02050 


000000 


02051 


760240 


020132 


100522 


02053 


760240 


02054 


100522 


02055 


622050 


02056 


703302 


02057 


102256 


02060 


700002 


02061 


705514 


02062 


202660 


02063 


042620 


02064 


222620 


02065 


741200 


02066 


600122 


02067 


342676 


02070 


040011 


02071 


220011 


02072 


042632 


02073 


220011 


02074 


042633 


02075 


202706 


02076 


100460 


02077 


102050 


02100 


777774 


02101 


042036 


02102 


222620 


02103 


042621 


02104 


222621 


02105 


100540 


02106 


102050 


02107 


44262,1 


02110 


442036 


02111 


602104 


02112 


442620 


02113 


602064 



O 02050 000000 SPACE2 

LAW 240 

JMS TYPONE 

O 02053 760240 LAW 240 

JMS TYRONE 

JMP** SPACE2 

O / 

/PRINT THE ENTIRE SYSTEM STATUS ON ANY ERROR 

/ 
O 02056 703302 SYSSTA OAF 

JMS PRTERR 

I OF 
O 02061 705514 ISA*10 

LAC (SUNK 

DAC TEMP4 

O 02064 222620 STATA LA0» TEMP4 

SNA 

JMP GETM0N*2 

O 02067 342676 TAD (5 

DAC li 

UAC» 11 

O 02072 042632 DAC A 

UACo JL1 

DAC A*l 

O 02075 202706 LAC (Anl+400000 O 

JMS TSJXBT 

JMS SPACE'2 

O 02100 777774 LAW *4 /SET UP COUNTER FOR UQDSW O 

DAC ERCAU /TO U0DSW*3 



LAC* TEMP4 

O 02103 042621 DAC TEMP5 

LAC« TEJMP5 

JMS PSQD 

O 02106 102050 JMS SPACE2 

JSZ TEMP5 

IS? ERCAU 

O 02111 602104 JMP i*5 

JSZ TEMP4 

JMP STATA 

O .EJECT 

o 



o 
o 
o 
o 

o 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 
o 



o 



o 
o 
o 

o 
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02114 000000 

O 02115 202660 

02116 042620 

02117 222620 
O 02120 741200 

02121 622114 JMP» ERTEST /EXJT, END OF SUNK TABU 

02122 342707 
O 32123 042621 DAC TEMP? /ADDRESS QF SYSERR 



02124 700002 

02125 705514 
O 02126 222621 

02127 740200 SZA /ANY ERROR 

02130 602134 

O 32131 442620 JSZ TEMP4 /NO ERROR 



02132 1023M 

02133 602117 

02134 042656 

02135 202656 



/*4 IS 


FOR DONE 


MESSAGE? 


/«<> is 


FOR THE 


REAL TIME 


f-l IS 


FOR RE-ENTER VIA 




/ 




ERTEST 









UC 


(SLINK 




DAC 


TEMP4 




LAC* 


f|MP4 




SNA 






JMP» 


ERTEST 




TAD 


(20 




DAC 


TEMP5 




I OF 






JSAU0 






LAC* 


TEMP? 




SZA 






JMP 


ER,1 




IS? 


TEMP4 




^MS 


APIP1 




JMP 
/ 

DAC 


ERfEST*3 


ER.l 


ERRWD 




LAC 


ERRWDff 




SAD 


i« 4 




JMP 


PRTDWN 




SAD 


<*5 




JMP 


RES,1 




SAD 


( «6 




JMP 


PRERR 




SAD 


<*7 




JMP 


REIN,! 




IAS 






RAU 






SPA 






JMP 


SYSSTA 




LAC 


ERRWP 




SAD 


ln% ' 




JMP 


PRERR 




SAD 


(«3 




JMP 


REJNIT 




SAD 


(n2 




JMP 


RESERV 




.EJECT 





O 02136 542710 

02137 602210 JMP PRTDUN /TEST IS PONE 

02140 542711 

O 02141 602204 

02142 542712 SAD C»6 /CLOCK TIME 

02143 602360 JMP PRERR /YES 
O 02144 542713 

02145 602206 

02146 750004 LAS /CHECK FOR SHUTDOWN ON FIRST ERROR 

O 02147 740010 

02150 741100 

02151 602056 JMP SYSSTA /SHUTDOWN 
O 02152 202656 

02153 5426/7 

02154 602360 
O 02155 542714 

02156 602335 JMP REINIT /PRINT ERROR AND RE-ENTER BY REINITIALIZING 



o 
o 



O /NOW CHECK ALL TESTS FOR AN ERROR CONDITION 

/ASYSER IN THE TEST (UODSW*20> CONTAINS -«4|»3f"?rn!L OR 

70 IS NO ERROR* «i JS'ERRORJ *2 IS ERROR AND ENTER THROUGH ^ 

O /SERVICE ADDRESS; n3 IS ERROR AND ENTER THROUGH INITIALIZATION ADDRESS) U 

^ - - --'■"-' ■-— *'-•-- B 5 MEANS RE-ENTER VIA SERVICE ENTRANCE NO ERROR, 

CLOCK, NOT" A VALID ERROR SO WON'T HALT ON SW01=1 
O f-~t IS FOR RE-ENTER VIA INITIALIZATION ENTRANCE, NO ERROR, U 



o 
o 
o 

o j 

o 
o j 

o ! 

i 

O ! 

O 

O 

O 

O 

giJp REJNIT /PRINT ERROR AND RE-ENTER BY REINITIALIZING 

02157 542702 



O 02160 602340 JMP RESERV /PRINT ERROR AND REENTER BY SERVi.CE ^ 

o 



o 
o 

o 



o 

o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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02161 
02162 
02163 
02164 
32165 
02166 
02167 

02170 
021/1 
02172 
02173 
02174 
02175 
02176 
02177 
02200 
02201 
02202 
02203 

02204 

02205 

02206 
32207 



OPSYSr SRC 

202676 

362620 
040012 
220012 
042632 
220012 
042633 
1626~21 
202715 
100460 
202716 
100460 
102050 
202656 
100540 
100514 
102364 
442620 
602U7 

162621 

602341 

162621 
602336 



OPERATING SYSTEM INTERACTIVE MODE 



ERTSTA 



RES,1 



REIN.l 



LAC 


(5 


TAD* 


TEMP4 


DAC 


12 


LAC* 


12 


DAC 


A' 


lap* 


12 


DAC 


An 


D2M<* 


TEMP5 


UAC 


UL,U^«R"1* 4 00000 


jms 


TSJXBT ' 


(■AC 


(A«l 


JMS 


TS1XBT 


JMS 


SPACE? 


LAC 


ERRWD' 


JMS 


PSOD 


JMS 


CRLJ 


JMS 


AP JPJ 


ISZ 


TEMP4 


JMP 
/ 

QHM<* 


ERTEST*3 


TEMPS 


JMP 

/ 

DZM« 


RESERV*! 


TEMP? 


JMP 


R|iNJT + i. 


.EJECT 





u 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



o ° 

o ° 

page; a. 4 opsyst src operating system .interactive mode 

O /CHECK SW02 TO SEE IF OPERATOR WANTS TO PRINT DONE MESSAGE O 

/FOR EACH DEVICE AS JT FINISHES ONE PASS THROUGH TEST 

/ o 

O 02210 162621 PRTDUM DHM* TEMP5 w 

JMS APJPi /CHECK FOR TURNING ON API 

urzx* ■swufvf LAC (20 /CHECK TO SEE IF AN ERROR EXISTS _ 

O 32213 362620 TAD* TEMP4 /BY CHECKING WG LOCATION IN USER <~> 

OAC U 

LAC* U 



O 02216 740200 SZA 

JMS PRTERR 
LAS 

O 02221 712010 RTU 

SPA 

JMP REJNIT*! 

O 02224 2026/6 LAC <5 

TAD* FEMP4 

OAC 14 

O 02227 220014 UAC* 3,4 

DAC A 

LAC* 14 

O 02232 042633 DAC A*l 

LAC (A=aM00000 



o 



02210 


162621 


02211 


102364 


02212 


202707 


02213 


362620 


02214 


040011 


02215 


220011 


02216 


740200 


02217 


102256 


02220 


750004 


02221 


742010 


02222 


741100 


02223 


602336 


02224 


2026/6 


02225 


362620 


02226 


040014 


02227 


220014 


02230 


042652 


02231 


220014 


02232 


042633 


02233 


202706 


02234 


100460 


02235 


20271/ 


02236 


100460 


02237 


100514 


02240 


602336 


02241 


042617 


02242 


102364 


02243 


202720 


02244 


100460 


02245 


202716 


02246 


100460 


02247 


102050 


02250 


202617 


02251 


100540 


02252 


700002 


02253 


705514 


32254 


777770 


02255 


602314 



JMS TSJXBT 

O 02235 202717 LAC (PUN»1 

JMS TSJXBT 

JMS CRV 

O 02240 602336 JMP REJNI T*3, 



JLWCCQ DAC TEMR3 

JMS APIPI 

O 02243 202720 LAC ( l(,WCflS-tt!*00000 

JMS TS'lxBT 

LAC <A«1 

O 02246 130460 JMS T S J X B T 

JMS SPACE2 

LAC TEMP3' 

O 02251 100540 JMS PSOD 

I0F 
ISA + ikJ 

O 02254 77777® LAW "10 

JMP SfCNT 
.EJECT 

o 
o 
o 
o 

o 



o 
o 
o 
o 
o 
o 
o 



/ILLEGAL WORD CQUNT IN USER ERROR TABLE ~ 

/ U 

o 



o 
o 
o 
o 
o 
o 
o 

o 



o 










o 
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OPSYST 


SRC OPERATING 


SYSTEM INTERACTIVE 


o 


02256 


000000 


PRTERR 






02257 


750004 


US 






2260 


502721 


AND 


(040000) 


o 


02261 


741200 


SNA 






02262 


602266 


JMP 


PRTR.l 




02263 


162621 


D2M* 


TEMP5*' 


o 


02264 


102364 


JMS 


APJPJ 




02265 


622256 


JMP* 
/ 
PRTR.l UAC* 


PRTERR 


o 


02266 


222620 


TEMP4 




02267 


342676 


TAD 


(5 




02270 


040011 


DAC 


li 


o 


02271 


220011 


LAC* 


%i 




02272 


042632 


DAC 


A" 




02273 


220011 


LAC* 


n 


o 


02274 


042633 


DAC 


A+j, 




02275 


202722 


LAP 


(BbI 




0227 6 


040012 


DAC 


3,2. 


o 


022/7 


040013 


DAC 


13 




02300 


222620 


LAC* 


TEMP4 




02301 


342707 


TAD 


(20 


o 


02302 


040011 


DAC 


n 




02303 


220011 


LAC* 


ii 




02304 


740100 


SMA 




o 


02305 


602241 


JMP 


JLWCCU 




02306 


342723 


TAD 


(10 




02307 


7401W0 


SNA 




o 


02310 


602313 


JMP 


i*3 




02311 


342724 


TAD 


(*10 




02312 


602241 


JMP 


ILWCCD 


o 


02313 


342724 


TAD 
/ 

STCNT DAC 


(■«&0 




02314 


042612 


LTEMP6 


o 


02315 


042613 


DAC 


LTEMP7 




02316 


220011 


LAC* 


11 




32317 


060012 


DAC* 


U 


o 


02320 


442612 


ISE 


LTEMP& 




02321 


602316 


JMP 


,si3 




02322 


162621 


DZM* 


TEMP5 


o 


02323 


102364 


JMS 


APJPI 




02324 


202706 


LAC 


(A»l*400000 




02325 


100460 


JMS 


TSJXBT 


o 


02326 


102050 


JMS 


SPACE2 




02327 


220013 


LAC* 


3,3 




02330 


100540 


JMS 


PSOD 


o 


02331 


442613 


ISH 


LTEMP7 




02332 


602326 


JMP 


,»4 




02333 


100514 


JMS 


CRLF 


o 


02334 


622256 


JMP* 
.EJECT 


PRTERR 


o 










o 










o 











MODE 



/PRINT NO USER ERROR 



/GET FIRST PART OF TITLE 
/GET SECOND PART OF TITLE 
/ADDRESS n% OF DATA ByFFER 

/GET ADDRESS »% OF ERROR WQ IN USER 



/WORD COUNT NEGATIVE? 

/ILLEGAL WORD COUNT IN USER ERROR TABLE 



/TOO NEGATIVE C>"3,0) 



/WORD COUNTER 



/DATA WORD ACQUISITION COMPLETE 
/CLEAR ERROR WORD FOR THE PEVJCE 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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16 


OPSYST SRC 


02335 


132256 


02336 


202676 


02337 


602342 


02340 


102256 


02341 


202672 


02342 


362620 


02343 


042621 


02344 


222621 


02345 


042621 


02346 


222620 


02347 


042622 


02350 


222622 


02351 


74 0100 


02352 


632362 


02353 


7 00002 


02354 


705514 


02355 


122621 


02356 


102364 


02357 


602202 


02360 


102256 


02361 


602202 


02362 


102364 


02363 


602355 


02364 


000000 


02365 


202625 


02366 


740100 


02367 


602371 


02370 


705504 


02371 


70004 2 


02372 


622364 



OPERATING SYSTEM INTERACTIVE MODE 



RE I NIT 



RESERV 



RESVil 



PRERR 
CPSERV 



APIPI 



JMS 


PRTERR 


LAC 


55 


JMP 


ReSERV+2 


/ 




JMS 


PRTERH 


UAC 


(4 


TAD* 


TEMP* 


DAC 


TEMP5 


UAC* 


TEMP5 


DAC 


TEMP5 


LAC* 


TEMP* 


DAC 


TEMP, 6 


UAC* 


TEMP|6 


SMA 




JMP 


CPSERV 


JQP 




ISA*10 




JMS* 


TEMP5 


JMS 


api pi 


JMP 
/ 

JMS 


ERTSTA 


PRTERR 


JMP 


ERTSTA 


JMS 


APIPJ 


JMP 


RESV,1 


/ 









UAC 


APJQN 


SMA 




JMP 


i+3 


ISA 




ION 




JMP* 


APIPI 


.EJECT 





/CALCULATE INITIALIZATION ADDRESS 



/PRINT ERRPR AND ENTER THE 
/SERVICE ENTRANCE 



/PRINT ERROR 
/DEVICE WILL GET 



INTERRUPT AND CONTINUE 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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qpsyst src 



02373 0000130 



OPERATING SYSTEM INTERACTIVE MOPE 

/EXECUTE UNIT TEST PROGRAMS 

/ 
/PROGRAM INTERRUPT SERVICE DISPATCH TABlE 

/ 
PIUIST 

,REPT 24 



023/4 


000000 







02375 


000000 


OR 




02376 


000000 


«R 




02377 


000000 


»R 




02400 


000000 


*R 




02401 


0000(30 


»R 




02402 


000000 


»R 




02403 


000000 


*R 




02404 


000000 


»R 




02405 


000000 


OR 




02406 


000000 


or 




02407 


000000 


OR 




02410 


000000 


»R 




024,11 


000000 


«R 




02412 


000000 


*»R 




32413 


000000 


«R 




02414 


000000 


»R 




02415 


000000 


OR 




02416 


000000 


OR 




02417 


000000 


SR 


/ 

/API SERVICE DISPATCH TABI.E 

/ 
APILST 








02420 


000000 










iREPT 24 


02421 


000000 







02422 


000000 


<<H 




02423 


000000 


»R 




02424 


000000 


OR 




02425 


030000 


OR 




02426 


000000 


*R 




02427 


000000 


OR 




02430 


000000 


oR 




02431 


000000 


«R 




02432 


000000 


OR 




02433 


00000 


OR 




02434 


000000 


OR 




02435 


000000 


OR 




32436 


000000 


t»R 




02437 


000000 


oR 




02440 


000000 


OR 




02441 


000000 


*R 




02442 


000000 


OR 




02443 


000000 


»R 




02444 


000000 


oR 





,E4ECT 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 
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OPS VST 


SRC OPERATING £ 


SYSTEM I, 


02445 


760040 


ER40 


LAW 


40 


3 24 4 6 


602012 




JMP 


APJERR 


02447 


760041 


ER41 


LAW 


41 


02453 


602012 




JMP 


APJERR 


024S3, 


760042 


ER42 


LAW 


42 


02462 


602012 




JMP 


APJERR 


02453 


760043 


ER43 


LAW 


43 


02454 


602012 




JMP 


APJERR 


02455 


760044 


ER44 


LAW 


44 


02456 


602012 




jmp 


APJERR 


02457 


760045 


ER45 


LAW 


45 


02460 


602012 




jmp 


APJERR 


02461 


760046 


ER46 


LAW 


46 


02462 


602012 




JMP 


APJERR 


02463 


760047 


ER47 


LAW 


47 


02464 


602012 




JMP 


APJERR 


02465 


760050 


ER50 


LAW 


50 


02466 


602012 




JHP 


APJERR 


02467 


760051 


ER51 


LAW 


51 


02470 


602012 




JMP 


APJERR 


02471 


760052 


ER52 


LAW 


52 


024 72 


602012 




JMP 


APJERR 


02473 


760053 


ER53 


LAW 


53 


02474 


602012 




JMP 


APJERR 


02475 


760054 


ER54 


LAW 


54 


02476 


602012 




JMP 


APJERR 


02477 


760055 


ER55 


LAW 


55 


02500 


602012 




JMP 


APJERR 


2501 


760056 


ER56 


LAW 


56 


02502 


602012 




JMP 


APJERR 


02503 


760057 


ER57 


LAW 


5 7 


02504 


602012 




JMP 
,EJECT 


APJERR 



u 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



o 












o 
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OPSYST 


SRC OPERATING 


SYSTEM INTERACTIVE 


o 


02505 


76006H 


ER60 


LAW 


60 




32506 


602012 




JMP 


APIERR 




02507 


760061 


KR61 


LAW 


6i 


o 


32510 


602012 




JMP 


APIERR 




025U 


760062 


ER62 


LAW 


62 




02512 


602012 




JMP 


AP{ ERR 


o 


92513 


760063 


ER63 


LAW 


63 




02514 


602012 




JMP 


APJERR 




02515 


760064 


ER64 


LAW 


64' 


o 


02516 


602012 




JMP 


APIERR 




02517 


760065 


ER65 


LAW 


65 


J*—", 


02520 


602012 




JMP 


APJERH 


o 


02521 


760066 


ER66 


LAW 


66 




02522 


602012 




JMP 


APJERR 




02523 


760067 


ER67 


LAW 


6 7 


o 


02524 


602012 




JMP 


APJERR 




32525 


760070 


ER/0 


LAW 


70 




32526 


602012 




JMP 


APJERR 


o 


02527 


760071 


ER/1 


LAW 


71 




02530 


602012 




JMP 


APJERR 




02531 


760072 


ER72 


LAW 


l'& 


o 


02532 


602012 




JMP 


APIERR 




02533 


760073 


ER73 


LAW 


73 




02534 


602012 




JMP 


APJERR 


o 


32535 


7600 74 


ER74 


LAW 


74 




02536 


602012 




JMP 


APJERR 




02537 


760075 


ER75 


LAW 


7? 


o 


02540 


602012 




JMP 


APJERR 




02541 


760076 


ER76 


LAW 


7 6 




02542 


602012 




JMP 


APJERR 


o 


02543 


760077 


ER/7 


LAW 


77 




02544 


602012 




JMP 
, EJECT 


APJERR 


o 












o 












o 












o 












o 












o 












o 












o 












o 













MODE 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 



< J 



u 
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OpSYS 


o 


02545 


172005 




0254 6 


220124 




02547 


1116B7 


o 


32550 


4.02331 




02551 


2324W5 




02552 


154026 


o 


025t>3 


630200 




02554 


233123 




32555 


052222 


o 


02556 


404 000 




02557 


400417 




02560 


160500 


o 


02561 


111414 




02562 


50701 




02563 


1440K5 





02564 


222240 




02565 


031704 




02566 


0^4000 


o 


0256 7 


111414 




02570 


050701 




025/1 


144027 





02572 


034011 




02573 


164005 




02574 


222240 


o 


025/5 


243102 




02576 


140543 




32577 


000000 


o 


02600 


012011 




32601 


401716 




02602 


000003 


o 






o 






o 






o 






o 






o 






o 






o 






o 






o 







SRC OPERATING SYSTEM .INTERACTIVE MODE 
SY5EXC ,SJXBT 'OPERATING SYSTEM V3BS&' 



TSYSER ,SJXBT 'SYSEKR &\ 

DUN ,SJ XBT ' QONE0I 

ILLERR ,SIXBT ' |L,LE GAL ERR CODE «M 



ILWCMS ,5IXBT 'ILLEGAL WC IN ERR TABLE 9' 



APJMSG ,SJXBT 'API QNC*' 



.EJECT 



o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 



o 



o 

o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
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opsyst SRC 



OPERATING SYSTEM .INTERACTIVE MODE 



02603 


000000 


SRVPI 





02604 


000000 


SRVAPI 





02605 


0000 00 


SRVCP 
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